home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-19 / lcad40.zip / MKSLIDE.BAT < prev    next >
DOS Batch File  |  1992-05-11  |  1KB  |  41 lines
  1. @Echo Off
  2.   Echo . 
  3.   Echo *===[ MkSlide.Bat copyright 1992 Mountain Software ]===*
  4.   Echo . 
  5.   Echo MkSlide.Bat will create a slide file for each AutoCAD drawing in a list
  6.   Echo of Directories. Use this batch file to create the initial set of AutoCAD
  7.   Echo slide files for all of your drawings.
  8.   Echo .
  9.   Echo Example:
  10.   Echo . 
  11.   Echo MKSLIDE DWGS BLOCKS
  12.   Echo . 
  13.   Echo will create slide files for all drawings in the directories DWGS and BLOCKS
  14.   Echo in addition to those in the current directory. MkSlide has only been tested
  15.   Echo with Release 11 and DOS 3.3/5.0 but will probably work with other versions.
  16.   Echo of DOS and AutoCAD. If AutoCAD needs any drivers or any Environment variables
  17.   Echo SET, then you must do that before running MkSlide. Make sure that all menu 
  18.   Echo files, text styles, blocks, or any other external files are available, 
  19.   Echo otherwise the script will fail.
  20.   Echo . 
  21.   Echo Press Ctrl-C to cancel or
  22.   Echo . 
  23.   Pause
  24.   Echo Creating MSlide.Scr...
  25. :Loop
  26.   Set _DIR=%1
  27.   If [%_DIR%]==[] SET _DIR=.
  28.   If Exist MkSlide.Scr Del MkSlide.Scr
  29.   For %%f In (%_DIR%\*.dwg) Do Echo 2 %%f .MSLIDE  .QUIT Y>>MkSlide.Scr
  30.   Echo 0>>MkSlide.Scr
  31.   If Not Exist %_DIR%\*.dwg GoTo NoDwgs
  32.   Echo Loading AutoCAD...
  33.   ACAD Dummy MkSlide
  34. :NoDwgs
  35.   If [%_Dir%]==[.] Goto Done
  36.   Shift
  37.   GoTo Loop
  38. :Done
  39.   Echo Done
  40.   Set _DIR=
  41.